﻿
Namespace LightSwitchApplication

    Public Class OrderManagement

        Private Sub OrderManagement_InitializeDataWorkspace(saveChangesTo As System.Collections.Generic.List(Of Microsoft.LightSwitch.IDataService))
            ' Write your code here.
            If Me.SourceId.HasValue Then
                Me.OrderHeaderProperty = Me.OrderHeader
            Else
                Me.OrderHeaderProperty = New OrderHeader()
            End If

        End Sub

        Private Sub OrderManagement_Saved()
            ' Write your code here.
            Me.Close(False)
            Application.Current.ShowDefaultScreen(Me.OrderHeaderProperty)
        End Sub

        Private Sub NewOrder_Execute()
            ' Write your code here.
            Me.OrderHeaderProperty = New OrderHeader()
        End Sub

        Private Sub OrderManagement_Created()
            ' Write your code here.


        End Sub
        
    End Class

End Namespace